/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_3 / issue04 / basicforum / binchopa

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 f4 20 3e 42 | 69 6e 53 65 61 72 63 68 |..... >B|inSearch|
|00000010| 31 0d 00 14 13 f4 20 42 | 69 6e 61 72 79 20 53 65 |1..... B|inary Se|
|00000020| 61 72 63 68 0d 00 1e 15 | f4 20 52 6f 62 65 72 74 |arch....|. Robert|
|00000030| 20 43 68 72 69 73 6d 61 | 73 0d 00 28 0e f4 20 31 | Chrisma|s..(.. 1|
|00000040| 39 38 39 31 31 31 35 0d | 00 32 05 3a 0d 00 3c 07 |9891115.|.2.:..<.|
|00000050| eb 20 33 0d 00 46 0e de | 20 6e 25 28 31 30 30 30 |. 3..F..| n%(1000|
|00000060| 29 0d 00 50 1a f1 20 22 | 42 69 6e 61 72 79 20 53 |)..P.. "|Binary S|
|00000070| 65 61 72 63 68 20 44 65 | 6d 6f 22 0d 00 5a 10 f2 |earch De|mo"..Z..|
|00000080| 63 72 65 61 74 65 5f 64 | 61 74 61 0d 00 64 05 3a |create_d|ata..d.:|
|00000090| 0d 00 6e 05 f5 0d 00 78 | 1f 20 20 e8 20 22 53 65 |..n....x|.  . "Se|
|000000a0| 61 72 63 68 20 66 6f 72 | 20 3a 20 22 3b 73 65 61 |arch for| : ";sea|
|000000b0| 72 63 68 25 0d 00 82 3e | 20 20 f1 20 22 43 6f 6e |rch%...>|  . "Con|
|000000c0| 76 65 6e 74 69 6f 6e 61 | 6c 20 3a 20 22 3b a4 73 |ventiona|l : ";.s|
|000000d0| 65 61 72 63 68 5f 63 6f | 6e 76 65 6e 74 69 6f 6e |earch_co|nvention|
|000000e0| 61 6c 28 31 2c 31 30 30 | 30 2c 73 65 61 72 63 68 |al(1,100|0,search|
|000000f0| 25 29 0d 00 8c 3b 20 20 | f1 20 22 52 65 63 75 72 |%)...;  |. "Recur|
|00000100| 73 69 76 65 20 20 20 20 | 3a 20 22 3b a4 73 65 61 |sive    |: ";.sea|
|00000110| 72 63 68 5f 72 65 63 75 | 72 73 69 76 65 28 31 2c |rch_recu|rsive(1,|
|00000120| 31 30 30 31 2c 73 65 61 | 72 63 68 25 29 0d 00 96 |1001,sea|rch%)...|
|00000130| 10 fd 20 73 65 61 72 63 | 68 25 3d 2d 31 0d 00 a0 |.. searc|h%=-1...|
|00000140| 05 3a 0d 00 aa 05 e0 0d | 00 b4 2d f4 20 2d 2d 2d |.:......|..-. ---|
|00000150| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000170| 2d 2d 2d 2d 0d 00 be 05 | 3a 0d 00 c8 12 dd 20 f2 |----....|:..... .|
|00000180| 63 72 65 61 74 65 5f 64 | 61 74 61 0d 00 d2 08 ea |create_d|ata.....|
|00000190| 20 63 25 0d 00 dc 15 f1 | 20 22 43 72 65 61 74 69 | c%.....| "Creati|
|000001a0| 6e 67 20 44 61 74 61 22 | 0d 00 e6 10 63 25 3d b3 |ng Data"|....c%=.|
|000001b0| 28 2d 31 30 30 30 30 29 | 0d 00 f0 10 6e 25 28 31 |(-10000)|....n%(1|
|000001c0| 29 3d 31 2b b3 28 33 29 | 0d 00 fa 13 e3 20 63 25 |)=1+.(3)|..... c%|
|000001d0| 20 3d 20 32 20 b8 20 31 | 30 30 30 0d 01 04 1a 20 | = 2 . 1|000.... |
|000001e0| 20 6e 25 28 63 25 29 3d | 6e 25 28 63 25 2d 31 29 | n%(c%)=|n%(c%-1)|
|000001f0| 2b b3 28 32 29 0d 01 0e | 08 ed 20 63 25 0d 01 18 |+.(2)...|.. c%...|
|00000200| 16 f1 20 22 46 69 72 73 | 74 20 3a 20 22 3b 6e 25 |.. "Firs|t : ";n%|
|00000210| 28 31 29 0d 01 22 19 f1 | 20 22 4c 61 73 74 20 20 |(1).."..| "Last  |
|00000220| 3a 20 22 3b 6e 25 28 31 | 30 30 30 29 0d 01 2c 05 |: ";n%(1|000)..,.|
|00000230| e1 0d 01 36 05 3a 0d 01 | 40 2e dd 20 a4 73 65 61 |...6.:..|@.. .sea|
|00000240| 72 63 68 5f 63 6f 6e 76 | 65 6e 74 69 6f 6e 61 6c |rch_conv|entional|
|00000250| 28 6c 6f 77 25 2c 68 69 | 67 68 25 2c 73 65 61 72 |(low%,hi|gh%,sear|
|00000260| 63 68 25 29 0d 01 4a 10 | ea 20 6d 69 64 25 2c 20 |ch%)..J.|. mid%, |
|00000270| 76 61 6c 25 0d 01 54 11 | 68 69 67 68 25 3d 68 69 |val%..T.|high%=hi|
|00000280| 67 68 25 2b 31 0d 01 5e | 10 76 61 6c 25 3d 73 65 |gh%+1..^|.val%=se|
|00000290| 61 72 63 68 25 0d 01 68 | 05 f5 0d 01 72 0c 20 20 |arch%..h|....r.  |
|000002a0| c8 8e 20 b9 20 ca 0d 01 | 7c 26 20 20 20 20 c9 20 |.. . ...||&    . |
|000002b0| 76 61 6c 25 20 3c 20 73 | 65 61 72 63 68 25 20 3a |val% < s|earch% :|
|000002c0| 20 6c 6f 77 25 20 3d 20 | 6d 69 64 25 0d 01 86 27 | low% = |mid%...'|
|000002d0| 20 20 20 20 c9 20 76 61 | 6c 25 20 3e 20 73 65 61 |    . va|l% > sea|
|000002e0| 72 63 68 25 20 3a 20 68 | 69 67 68 25 20 3d 20 6d |rch% : h|igh% = m|
|000002f0| 69 64 25 0d 01 90 07 20 | 20 cb 0d 01 9a 1f 20 20 |id%.... | .....  |
|00000300| 6d 69 64 25 20 3d 20 28 | 6c 6f 77 25 20 2b 20 68 |mid% = (|low% + h|
|00000310| 69 67 68 25 29 20 81 20 | 32 0d 01 a4 15 20 20 76 |igh%) . |2....  v|
|00000320| 61 6c 25 20 3d 20 6e 25 | 28 6d 69 64 25 29 0d 01 |al% = n%|(mid%)..|
|00000330| ae 27 fd 20 68 69 67 68 | 25 20 2d 20 6c 6f 77 25 |.'. high|% - low%|
|00000340| 20 3d 20 31 20 84 20 76 | 61 6c 25 20 3d 20 73 65 | = 1 . v|al% = se|
|00000350| 61 72 63 68 25 0d 01 b8 | 24 e7 20 76 61 6c 25 20 |arch%...|$. val% |
|00000360| 3d 20 73 65 61 72 63 68 | 25 20 8c 20 3d 20 6d 69 |= search|% . = mi|
|00000370| 64 25 20 8b 20 3d 20 2d | 31 0d 01 c2 05 3a 0d 01 |d% . = -|1....:..|
|00000380| cc 2b dd 20 a4 73 65 61 | 72 63 68 5f 72 65 63 75 |.+. .sea|rch_recu|
|00000390| 72 73 69 76 65 28 6c 6f | 77 25 2c 68 69 67 68 25 |rsive(lo|w%,high%|
|000003a0| 2c 73 65 61 72 63 68 25 | 29 0d 01 d6 10 ea 20 6d |,search%|)..... m|
|000003b0| 69 64 25 2c 20 76 61 6c | 25 0d 01 e0 1d 6d 69 64 |id%, val|%....mid|
|000003c0| 25 20 3d 20 28 6c 6f 77 | 25 20 2b 20 68 69 67 68 |% = (low|% + high|
|000003d0| 25 29 20 81 20 32 0d 01 | ea 13 76 61 6c 25 20 3d |%) . 2..|..val% =|
|000003e0| 20 6e 25 28 6d 69 64 25 | 29 0d 01 f4 1d e7 20 76 | n%(mid%|)..... v|
|000003f0| 61 6c 25 20 3d 20 73 65 | 61 72 63 68 25 20 8c 20 |al% = se|arch% . |
|00000400| 3d 20 6d 69 64 25 0d 01 | fe 1d e7 20 68 69 67 68 |= mid%..|... high|
|00000410| 25 20 2d 20 6c 6f 77 25 | 20 3d 20 31 20 8c 20 3d |% - low%| = 1 . =|
|00000420| 20 2d 31 0d 02 08 31 e7 | 20 76 61 6c 25 20 3c 20 | -1...1.| val% < |
|00000430| 73 65 61 72 63 68 25 20 | 8c 20 6c 6f 77 25 20 3d |search% |. low% =|
|00000440| 20 6d 69 64 25 20 8b 20 | 68 69 67 68 25 20 3d 20 | mid% . |high% = |
|00000450| 6d 69 64 25 0d 02 12 2a | 3d a4 73 65 61 72 63 68 |mid%...*|=.search|
|00000460| 5f 72 65 63 75 72 73 69 | 76 65 28 6c 6f 77 25 2c |_recursi|ve(low%,|
|00000470| 68 69 67 68 25 2c 73 65 | 61 72 63 68 25 29 0d 02 |high%,se|arch%)..|
|00000480| 1c 05 3a 0d ff          |                         |..:..   |        |
+--------+-------------------------+-------------------------+--------+--------+